home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mesolore
/
Mesolore - Disc 2.iso
/
mac
/
data
/
Selden.dir
/
00005_Script_Nav(scroll) Courtyard -1
< prev
next >
Wrap
Text File
|
2001-03-05
|
400b
|
18 lines
on mouseDown
GenLeaveCtyd
cursor 130
set ctr = 1
set cNum = integer(char 2 of the frameLabel)
repeat while the mouseDown or ctr = 1
set cNum = (cNum-1) mod 4
if cNum < 0 then set cNum = 3
puppetTransition 12,2,30,0
goto ("C" & cNum)
startTimer
repeat while the timer < 30
end repeat
set ctr = ctr-1
end repeat
GenEnterCtyd
cursor 0
end